SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
CREATE  FUNCTION [dbo].[FU_RETE_FLAG] 
/*------------------------------------------------------*/      
/*---- Empresa           : OFISIS S.A.              ----*/      
/*---- Cliente           : OFISIS S.A.              ----*/      
/*---- Nombre FU         : FU_RETE_FLAG		    ----*/      
/*---- Desarrollado por  : Daniel Chiang 	    ----*/      
/*---- Fecha Creación    : 10/07/2008               ----*/      
/*---- Base de Datos     : SLQ Server               ----*/      
/*---- Versión           : 8.0                      ----*/      
/*------------------------------------------------------*/      
/*---Modificado 1 por     :                         ----*/    
/*---Fecha Modificación   :                         ----*/    
/*---Detalle Modificación :                         ----*/    
/*------------------------------------------------------*/      

(
@ISCO_EMPR VarChar(2),
@ISST_RETE_0001 VarChar(1),
@ISST_BCON VarChar(1),
@ISST_RETE_0002 VarChar(1),
@IDFE_EMIS Datetime,
@INIM_MAXI_NRET Numeric(16,4),
@INIM_IMP1 Numeric(16,4),
@ISST_DOCU_0004 VarChar(1),
@INIM_TOTA Numeric(16,4)
)

Returns  VarChar(1)
As
Begin
  Declare
  @VSST_RETE_0001 VarChar(1),
  @VSST_BCON      VarChar(1),
  @VSST_RETE_0002 VarChar(1),
  @VSST_FLAG      VarChar(1),
  @VSST_AGEN_RETE      VarChar(1),
  @VNIM_MAXI_NRET Numeric(16,4),
  @VDFE_INIC_RETE Datetime
	
  Select @VSST_AGEN_RETE = ST_AGEN_RETE 
  from TMPARA_TESO
  WHERE CO_EMPR = @ISCO_EMPR

  IF @VSST_AGEN_RETE = 'S'
	BEGIN
  		Select @VDFE_INIC_RETE = Convert( datetime, '01/06/2002', 103)
  		If @ISST_RETE_0001 != 'S' And @ISST_BCON != 'S' And @ISST_RETE_0002 = 'S' 
     	And @INIM_IMP1 !=0 And @ISST_DOCU_0004 != 'S' And @IDFE_EMIS > @VDFE_INIC_RETE
  		Begin
     		If @INIM_TOTA > @INIM_MAXI_NRET
        	Select @VSST_FLAG = '*'
     		Else
        	Select @VSST_FLAG = '_'
  		End
  	    Else
     		Select @VSST_FLAG = ''

END
ELSE 
	Select @VSST_FLAG = ''
Return @VSST_FLAG
End

/*------------------------ FIN ----------------------------*/

GO
